home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 26.zip / BS1 part 26 / C for beginners.adf / source / base-conv.c < prev    next >
Text File  |  1978-01-17  |  790b  |  32 lines
  1. /* base-con.c  9.3.1 */
  2. void main ()
  3. {
  4.    long base, collect, value;
  5.    int index, help;
  6.    char test[100];
  7.  
  8.    printf("Please input Base of numbering system!\n");
  9.    scanf("%ld", &base);
  10.    printf("Input number for conversion in base %ld system!\n", base);
  11.    scanf("%80s", test);
  12.    collect = 0;
  13.    value = 1;
  14.    index = strlen(test) - 1; /*New Function */
  15.    while( index >= 0)
  16.      {
  17.       help = test[index];
  18.       if(help >= 'a')   /* lowercase letter */
  19.         help = help - 'a' + 10;
  20.       else
  21.       if(help >= 'A')  /* uppercase letter */
  22.         help = help - 'A' + 10;
  23.       else   /* Probably a number */
  24.         help = help - '0';
  25.    collect = collect + value * help;
  26.    index = index - 1;
  27.    value = value * base;
  28.   }
  29.  printf("%s(%ld) = %ld(10)\n", test, base, collect);
  30. }
  31.  
  32.